home *** CD-ROM | disk | FTP | other *** search
/ BMUG Revelations / BMUG Revelations.toast / Programming / Programming Languages / UCB Logo 3.0 / logolib / dequeue < prev    next >
Encoding:
Text File  |  1992-09-04  |  132 b   |  9 lines  |  [TEXT/JV01]
  1. to dequeue :queue
  2. local "result
  3. make "result first thing :queue
  4. make :queue butfirst thing :queue
  5. output :result
  6. end
  7.  
  8. bury "dequeue
  9.